data intTree = intNode intTree intTree | intLeaf int 

sumTree::intTree->int
sumTree (intLeaf n)  = n
sumTree (intNode t tt) = (sumTree t) + (sumTree tt)

main = sumTree (intNode (intLeaf 2) (intLeaf 5))
